home *** CD-ROM | disk | FTP | other *** search
/ Trading on the Edge / Trading On The Edge - CD-ROM Toolkit (Wayzata Technology)(2031)(1994).bin / pc / pc_files / mktdata / econdata / docutils / amiarc.exe / PIBG$.REG < prev    next >
Text File  |  1989-06-14  |  271b  |  10 lines
  1. save pibg$.sav
  2. title PIBG$ -- PERSONAL INCOME BEFORE GOVERNMENT
  3. fex tax$ = (nibtax + nconsi + pitax)/dc
  4. fex pibg$ = (gnp - ncca - niprf + npdivi - nsd + piipcb)/dc
  5. fex gtnis$ = pidis$ - pibg$ + tax$
  6. fex taxrate = tax$/pibg$
  7. r pibg$ = gnp$, gnp$[1]
  8. gr *
  9. save off
  10.